﻿Public Class FormMain

    Private Sub DanhSáchPhòngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DanhSáchPhòngToolStripMenuItem.Click
        Dim f = New DanhSachPhong()
        f.Show()
    End Sub

    Private Sub ThêmPhòngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ThêmPhòngToolStripMenuItem.Click
        Dim f1 = New ThemPhong()
        f1.Show()
    End Sub

    Private Sub XóaPhòngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles XóaPhòngToolStripMenuItem.Click
        Dim f2 = New XoaPhong()
        f2.Show()
    End Sub

    Private Sub SửaPhòngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SửaPhòngToolStripMenuItem.Click
        Dim f3 = New SuaPhong()
        f3.Show()
    End Sub

    Private Sub TìmKiếmPhòngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TìmKiếmPhòngToolStripMenuItem.Click
        Dim f4 = New TimKiem()
        f4.Show()
    End Sub

    Private Sub DToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DToolStripMenuItem.Click
        Dim f5 = New BaoCaoDoanhThu()
        f5.Show()
    End Sub

    Private Sub MậtĐộSửDụngPhòngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MậtĐộSửDụngPhòngToolStripMenuItem.Click
        Dim f6 = New MatDoSuDungPhong()
        f6.Show()
    End Sub

    Private Sub DanhSáchLoạiPhòngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DanhSáchLoạiPhòngToolStripMenuItem.Click
        Dim f7 = New DanhSachLoaiPhong()
        f7.Show()
    End Sub
End Class
